package com.ruoyi.common.framework.aspectj;

import java.util.ArrayList;
import java.util.List;
import java.util.Map;
import java.util.stream.Collectors;

import cn.hutool.core.bean.BeanUtil;
import cn.hutool.extra.spring.SpringUtil;
import com.ruoyi.common.core.domain.entity.SysDept;
import com.ruoyi.common.core.mapper.SysDeptMapper;
import com.ruoyi.service.SysUserServiceImpl;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;
import com.ruoyi.common.annotation.DataScope;

import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.core.domain.model.LoginUser;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.framework.security.context.PermissionContextHolder;

/**
 * 数据过滤处理
 */
@Aspect
@Component
public class DataScopeAspect {
    /**
     * 全部数据权限
     */
    public static final String DATA_SCOPE_ALL = "5";

    /**
     * 所在机构数据权限
     */
    public static final String DATA_SCOPE_UNIT = "4";

    /**
     * 部门及以下数据权限
     */
    public static final String DATA_SCOPE_DEPT_AND_CHILD = "3";

    /**
     * 部门数据权限
     */
    public static final String DATA_SCOPE_DEPT = "2";
    /**
     * 仅本人数据权限
     */
    public static final String DATA_SCOPE_SELF = "1";

    /**
     * 数据权限过滤关键字
     */
    public static final String DATA_SCOPE = "dataScope";


    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) throws Throwable {
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope) {
        // 获取当前的用户
        LoginUser loginUser = SecurityUtils.getLoginUser();

        if (StringUtils.isNotNull(loginUser)) {
            SysUser currentUser = loginUser.getUser();
            // 如果是超级管理员，则不过滤数据
            if (StringUtils.isNotNull(currentUser) && !SysUserServiceImpl.isAdmin(loginUser.getUserId())) {
                String permission = StringUtils.defaultIfEmpty(controllerDataScope.permission(), PermissionContextHolder.getContext());
                dataScopeFilter(joinPoint, currentUser, controllerDataScope.deptAlias(),
                        controllerDataScope.userAlias(), permission);
            }
        }
    }

    /**
     * 数据范围过滤
     *
     * @param joinPoint  切点
     * @param user       用户
     * @param deptAlias  部门别名
     * @param userAlias  用户别名
     * @param permission 权限字符
     */
    public static void dataScopeFilter(JoinPoint joinPoint, SysUser user, String deptAlias, String userAlias, String permission) {
        StringBuilder sqlString = new StringBuilder();

        List<String> conditions = new ArrayList<String>();
        SysDept dept = user.getDept();
        for (SysRole role : user.getRoles()) {
            String dataScope = role.getDataScope();
            if (StringUtils.isNotEmpty(permission) && StringUtils.isNotEmpty(role.getPermissions())
                    && !StringUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission))) {
                continue;
            }
            if (DATA_SCOPE_ALL.equals(dataScope)) {
                sqlString = new StringBuilder();
                conditions.add(dataScope);
                break;
            } else if (DATA_SCOPE_DEPT.equals(dataScope)) {
                sqlString.append(StringUtils.format(" OR {}.dept_id = {} ", deptAlias, user.getDeptId()));
                //用户所担任的部门
                List<SysDept> deptList = SpringUtil.getBean(SysDeptMapper.class).findByLeaderUserId(user.getUserId());
                deptList = deptList.stream().filter(d -> d.getDeptId().longValue() != dept.getDeptId().longValue()).collect(Collectors.toList());
                if (!deptList.isEmpty()) {
                    for (SysDept dept1 : deptList) {
                        sqlString.append(StringUtils.format(" OR {}.dept_id = {}", deptAlias, dept1.getDeptId()));
                    }
                }
                sqlString.append(StringUtils.format(" OR {}.dept_id is null OR {}.user_id = {}",deptAlias,  userAlias, user.getUserId()));
            } else if (DATA_SCOPE_DEPT_AND_CHILD.equals(dataScope)) {
                sqlString.append(StringUtils.format(
                        " OR {}.dept_id is null OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE dept_id = {} or find_in_set( {} , ancestors ) )",
                        deptAlias, deptAlias, user.getDeptId(), user.getDeptId()));

                //用户所担任的部门
                List<SysDept> deptList = SpringUtil.getBean(SysDeptMapper.class).findByLeaderUserId(user.getUserId());
                deptList = deptList.stream().filter(d -> d.getDeptId().longValue() != dept.getDeptId().longValue()).collect(Collectors.toList());
                if (!deptList.isEmpty()) {
                    for (SysDept dept1 : deptList) {
                        sqlString.append(StringUtils.format(
                                " OR {}.dept_id is null OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE dept_id = {} or find_in_set( {} , ancestors ) )",
                                deptAlias,deptAlias, dept1.getDeptId(), dept1.getDeptId()));
                    }
                }
                sqlString.append(StringUtils.format(" OR {}.user_id = {}", userAlias, user.getUserId()));
            } else if (DATA_SCOPE_UNIT.equals(dataScope)) {
                sqlString.append(StringUtils.format(
                        " OR {}.dept_id is null OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE root_dept_id = {})",
                        deptAlias,deptAlias, dept.getRootDeptId()));
            } else if (DATA_SCOPE_SELF.equals(dataScope)) {
                if (StringUtils.isNotBlank(userAlias)) {
                    sqlString.append(StringUtils.format(" OR {}.dept_id is null OR {}.user_id = {} ",deptAlias, userAlias, user.getUserId()));
                } else {
                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
                    sqlString.append(StringUtils.format(" OR {}.dept_id is null OR {}.dept_id = 0 ",deptAlias, deptAlias));
                }
            }
            conditions.add(dataScope);
        }

        // 多角色情况下，所有角色都不包含传递过来的权限字符，这个时候sqlString也会为空，所以要限制一下,不查询任何数据
        if (StringUtils.isEmpty(conditions)) {
            sqlString.append(StringUtils.format(" OR {}.dept_id = 0 ", deptAlias));
        }

        if (StringUtils.isNotBlank(sqlString.toString())) {
            Object params = joinPoint.getArgs()[0];
            if (StringUtils.isNotNull(params)) {
                if (params instanceof Map) {
                    ((Map) params).put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
                } else if (joinPoint.getArgs().length > 1 && joinPoint.getArgs()[1] instanceof Map) {
                    params = joinPoint.getArgs()[1];
                    ((Map) params).put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
                } else {
                    Object paramsFieldVal = BeanUtil.getFieldValue(params, "params");
                    if (paramsFieldVal != null && paramsFieldVal instanceof Map) {
                        Map paramsMap = (Map) paramsFieldVal;
                        paramsMap.put(DATA_SCOPE, " AND (" + sqlString.substring(4) + ")");
                    }
                }
            }
        }
    }

    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint) {
        Object params = joinPoint.getArgs()[0];
        if (StringUtils.isNotNull(params)) {
            Object paramsFieldVal = BeanUtil.getFieldValue(params, "params");
            if (paramsFieldVal != null && paramsFieldVal instanceof Map) {
                Map paramsMap = (Map) paramsFieldVal;
                paramsMap.put(DATA_SCOPE, "");
            }
        }
    }
}
